1 REM"          "BM STAFF EYES ONLY!(null)
2 POKE 808,234:POKE 53280,0:POKE 53281,0
4 FORT=1 TO 500:NEXT
6 PRINT"[147][155]   THE BIG MOUTH MAGAZINE - MAIN MENU"
8 FORT=1 TO 2000:NEXT
10 PRINT"[147]"
15 FORT=1 TO 500:NEXT
20 PRINTTAB(7)"THE BIG MOUTH - MAIN MENU"
30 PRINT"SUPPORTWARE:"
31 PRINTTAB(5)"A - SUPPORTWARE GUIDE"
32 PRINTTAB(5)"B - BLITZ 2000 INSTRUCTIONS"
33 PRINTTAB(5)"C - BLITZ 2000"
34 PRINTTAB(5)"D - SCEPTRE UNCUT INSTRUCTIONS"
35 PRINTTAB(5)"E - SCEPTRE UNCUT"
36 PRINTTAB(5)"F - ASTROMINE PLAYABLE DEMO"
40 PRINT"NON SUPPORTWARE:"
41 PRINTTAB(5)"G - ESP SYNTH VERS 1"
50 PRINT"PICK A PROGRAM TO LOAD (A-G) ?"
55 GET A$:IF A$="" THEN 55
60 A=ASC(A$):IF A-64<1 OR A-64>7 THEN 55
65 IF A-64=5 THEN 100
66 IF A-64=7 THEN 130
70 FORX=49152 TO 49170:READY:POKE X,Y:NEXTX
75 SYS 49152
76 DATA 120,169,013,141,040,003,169,192
77 DATA 141,041,003,088,096,238,032,208
78 DATA 076,237,246
80 ON A-64 GOTO 100,100,100,100,100,100,130
99 :
100 POKE 53280,6:POKE 53281,6:PRINTCHR$(8)
101 PRINT"[147][158]PLEASE NOW NOTE!"
102 PRINT"IF YOU LIVE OUTSIDE THE UK, AND WANT TO ";
103 PRINT"SEND ME A CONTRIBUTION, I CAN NOW ACCEPT";
104 PRINT"YOUR COUNTRIES CASH CURRENCY, BECAUSE I ";
105 PRINT"AM ABLE TO GET IT CHANGED TO UK POUNDS!!";
106 PRINT"THANKS! AND ALL THE BEST..."
107 PRINT"HAVE FUN.. FROM THE AUTHOR!"
108 PRINT"[159]JON WELLS"
109 PRINT"9 DE GREY ROAD"
110 PRINT"KING'S LYNN"
111 PRINT"NORFOLK"
112 PRINT"PE30 4PH"
113 PRINT"[153]ENGLAND"
115 PRINT"NOTE FROM  THE BIG MOUTH [146] TO JON WELLS:"
116 PRINT"SORRY THAT THIS HAS BEEN ALTERED WITH"
117 PRINT"OUR OWN MENU BUT YOURS WOULDN'T WORK!!!!"
119 PRINT"NOW LOADING YOUR SELECTION - PLEASE WAIT"
120 IF A-64=1 THEN LOAD"SUPPORT-GUIDE+DL",8,1
121 IF A-64=2 THEN LOAD"DISK-BLITZ INSTZ",8,1
122 IF A-64=3 THEN LOAD"BLITZ 2000 - C64",8,1
123 IF A-64=4 THEN LOAD"DISK-UNCUT INSTZ",8,1
124 IF A-64<>5 THEN 127
125 PRINT"LOAD"CHR$(34)"SCEPTRE UNCUT!!!"CHR$(34)",8,1[145][145][145]"
126 LOAD"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]",8,1
127 LOAD"ASTROMINE-64DEMO",8,1
130 PRINT"   WAIT - ESP SYNTH VERS 1 IS LOADING "
135 LOAD"ESP SYNTH VERS 1",8,1